home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
rbbs_pc
/
mapl0301.zip
/
ANSIED.STB
< prev
next >
Wrap
Text File
|
1993-03-01
|
797b
|
23 lines
'* Stub for ANSIED v2.44a. Can be used to remove to code for
'* ANSIED when linking with code that requires it. Ideally, a
'* CONFIG option would be used to disable the use of ANSIED to
'* make everything transparent to the user. That way, they
'* won't select ANSIED, only to have the msg popping up saying
'* that it's not available.
'* After compiling, just use AEDSTUB.OBJ instead
'* of ANSIED-3.OBJ on the LINK command line.
' $INCLUDE: 'RBBS-VAR.MOD'
SUB Ansied (T$, S$, L%) STATIC
Call QuickTPut1 ("Sorry, ANSIEd is not available.")
IF ZFullScreenEditor Then _
Call QuickTPut1("Use [T]oggle to disable ANSIED.")
'* Set return code to an undefined value so that line editor
'* will be used.
ZSubParm = 9
END SUB